Gold Medal Software 1/Gold Medal Software Volume 1 (Gold Medal) (1994).iso/prog/dasv10_.arj/ITEFACT.CPP

Text File | 1993-08-13 | 170 b | 12 lines

// math.lib function iterative_fact()

long iterative_fact(long number)
{
    long j,total=1;

    for (j=1;j<=number;j++) {
        total = total * j;
    }
return total;
}